RECOMP II USERS' PROGRAM NO. 1070 



PROGRAM TITLE: 



AGC-8I1 INSTRUCTION FORMAT TAPE PUNCH WITH LOCATIONS 
AGC-8I1R INSTRUCTION FORMAT TAPE PUNCH WITH LOCATIONS 
(Relocatable by RUG-10$7) 



PROGRAM CLASSIFICATION: Service Routine 



AUTHOR: 



PURPOSE: 



DATE: 



Donald S. Croxton 
Aerojet-General Corporation 
Sacramento, California 

This program punches any specified portion of 
memory in command format with the location given 
for every fourth word. The tape may be listed on 
the flexowriter or read by the photoreader. 
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Published by 
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at 

AUTONETICS INDUSTRIAL PRODUCTS 

A DIVISION OF NORTH AMERICAN AVIATION, INC. 
31*00 E. 70th Street, Long Beach 5, Calif. 
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TITLE: 



LOCATIONS USED: 



INTRODUCTION: 



METHOD: 



LIMITATIONS: 



USAGE: 



AGC-8U INSTRUCTION FORMAT TAPE PUNCH WITH LOCATIONS 
AGC-81jR INSTRUCTION FORMAT TAPS PUNCH WITH LOCATIONS 
(Relocatable by RUG- 1057) 

AGC-8U: 7000-7077 

AGC-8i|R: 7000-7106 (The extra locations contain the 
minus zeroes required by RUG-1057). 

This program will punch the contents of memory from one 
specified location to another specified location, 
inclusively. The tape contains a location, four words 
in command format, another location, four words, etc., 
until the last location has been punched. The final 
group of words may contain less than four words. The 
taoe may be read into the computer or listed on a Flexo- 
writer. Such a listing is neat and easily checked. 
Because there are no line feed codes on such a tape, it 
may be easily duplicated on a flexowriter. Any word 
may be quickly located on the tape as each group of one 
location and four words is preceded by 16 blanks. If 
additional blocks of memory are punched on the same tape, 
there are 32 additional blanks punched between the two 
blocks. 

The following are punched in order: L/S, 16 blanks, 
"L", F/S. A U-octal-digit address is dissected into 
four groups of three binary bits each and reassembled 
as a BCD number followed by a terminate code. This 
word is then punched by a PNW command. Then tab, L/S, 
rl C" , F/S are punched. Four consecutive words from 
memory are punched in command format. The first three 
words are entered with a tab. The fourth word is entered 
by I/S, C/R. This is followed by 16 blanks, "L", F/S. 
Another k-digit address is then punched. 

The tape produced will be about twice as long as it 
would be if punched in Baudot code. 

Read in program tape. Set location counter to first 
location of program (7000 for AGC-8U). On console, hit: 

C + 00 (XXXX) F + 00 (XXXX) L Enter 

where (XXXX)^ is the first location to be punched and 

(XXXX) L is the last location to be punched. Press the 

regular start button. When machine stops punching 
tane, new first and last locations may be entered if 
additional blocks o£ memory are to be punched on the 
same tape. 
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TIMES 
RELOCATION: 



EXAMPLE: 



If Sense Switch B has been turned on by the time the last 
word has been punched, the tape will be ended with the 
location (XXXX) F and a start code ("S"). 

OPTIONS: If it is desired to end the tape with a halt 
code ("H" ), change the following word: 

703U: + 7U 002U0 + 7h 00330 

If it is desired to start (or halt) at some 
address (XXXX)a other than the first one, make 
the following changes. 

7031: + 7U 00330 + 00 (YYYY)O 
YYYY: + 00 (XXXX) A - 00 0000 

About lj seconds per word. 

Read AGC-8hR into memory. Read RUG-1057 (AGC-031) into 
memory. The location counter should be set to 7500 and 
the machine should be in command mode. On the console, 
hit: 

+ 00 70000 + 00 (XXXX)nO Enter 

where (XXXX)j^ is the location where the relocated version 
will begin. Set the sense switches (B to punch tape; 
C to relocate in memory; D to end tape). Hit regular 
start. For further details concerning relocation, see 
RUG- 1057 • 

Read the tape for AGC-8U into memory. At location 7000, 
enter on the console: 



C + 00 70000 + 00 70770 

Hit the regular start button. Compare this tape with 
the original or list it on a flexowriter and compare 
the listing with the program listing. 
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AGC-81* 



L7000C 0+0070000+0070770 +0070000+^+2701 4o +6070520+01705 10 ++1002+0++270530 

L7OOU0 0+7^00370+02705^0 +7+776CO+7+7760O +7+00220+7+00330 +OO7055O+607057O 

L701 00 0+0070000+5770+00 +7+00260+7+00100 +7+00370+7+001 6c +7*100330+4000000 

L.701+0 c+i +70 1+0+00701+0 +0170560++2701+0 +0370530+5270250 +0070570+0370560 

L70200 c+6070570+5070220 +7+00 1 00+5770 1 Ho +7+00370+7+00100 +0070000+0170550 

L.702+C C++270000 +57 700+1 +7+00370+7+00100 +5+70270+57703+1 +02705+0+7+77600 

L70300 0+7+77600+7+00220 +7^00330+0070520 +5770+00+7+00260 +7+001 00+7+00370 

L703+0 c+7 +00050+7 +00330 +02705+0+7+77600 +7+77600+7+77600 +7+77600+7770000 

L70+00 -0+1570720+0170510 ++27071 1+0070720 ++ 100020+6070720 +5770+70+0000000 

L70++0 c+i 570720+01 70510 ++27071 1+0070720 ++ 100260+6070720 +6+70600+6670700 

L.70500 c+0077720+5777600 +0000000-0000001 +0070000+0070770 +1+70771+00701 Uo 

L705+G C+0000000 -0000000 +00000^0 -000 0000 +0000010-0000000 +0000010-0000000 

L70600 c+3377770+0 1 77730 +6077730+0077720 +3377760++1 000 10 +01 77730+6077730 

L706+0 c+0077720+3377750 ++1 00020+0 177730 +6077730+0077720 +33777 +0++1 00030 

L70700 c+o 177730+6077730 +1^77731+57701 10 +03+3+10-03+37+0 +0000031+0000000 

L707+0 c+03+ooco-OOGOOOC +003^000-0000000 +0003+00 -00 00000 +0000340-0000000 *0 

L70000 CH • 



AGC-814R 



L70000 g+ooooogo+gooocco +0070000+^270 1 ko +6070520+0 1 705 1 -+i 002+0++27 0530 

LyooUc 0-7+00370+02705+0 -7+77600-7+77600 -7+00220-7+00330 +0070550+6070570 

L70100 G +0070000+5770+00 -7+00260-7^00100 -7^00370-7400160 -7+OC330-+OOOOGO 

L701 ko 0-1+00000+00701+0 +0170560+^2701^0 +0370530+5270250 +0070570+0370560 

L.70200 c+6070570+5070220 -7 too 1 00+5770 1 ko -7+00370-7+00 1 00 +0070000+0 1 70550 

L702+0 G++270GOO+5770C+1 -7*100370-7+00100 +5+70270+57703+1 +02705+0-7+77600 

L70300 G-7+77600-7+00220 -7+00330+0070520 +5770^00-7^00260 -7+001 OC-7+0037C 

L.703+0 G-7+OOG50-7H00330 +02705H0-7+77600 -7+77600-7+77600 -7+77600+7770GGO 

L.70+00 c+i 570720+0170510 ++27071 1+0070720 -+ 100020+6070720 +57 70+70+0000 ooo 

170++0 c+i 570720+01 70510 ++27071 1+0070720 -+ 100260+6070720 +6+70600+6670700 

L705OO G-OO7772O-577760O -0000000-0000000 +0000000-0000001 +0000000-0000000 

L705H0 G-ooooooc -0000000 -1 +00000+0070 1 +0 -OOOOCOO-OOOCOOO +0C- 000 00-0000 coo 

L70600 G +00000+0 -OOOOGGO +0000010-0000000 +0000000-0000000 -0000000-0000000 

L70640 c-3377770-01 77730 -6077730-0077720 -3377760-+100010 -0177730-6077730 

L.7070G G-0077720-3377750 -+ 1 00020-0 1 777 30 -6077730-0077720 -33777+0 -+ 1 00030 

L707+O G-0 I7773O-607773O -1477731+577G1 10 -0000000-0000000 +0000000-0000000 

L71000 G +000003 1+0000000 +03+0000-0000000 +OO3U0OO-OOOOCOG +OOO3H0O-OOGOOGO <§ 

L7IO+O G+00003^0-0000000 -OGOOOQC-OOOOOOG -000 0000 -0000 000 H 
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